home *** CD-ROM | disk | FTP | other *** search
/ Zoom 2 / Zoom - Release 2 (1996)(Active Software)[!].iso / programming / basic / ace / externfunc / sub2.s < prev   
Encoding:
Text File  |  1994-01-10  |  189 b   |  11 lines
  1. ; subtract two short integers passed from ACE and return result in d0.
  2.  
  3.     xdef _subtract
  4.  
  5.     _subtract:
  6.         move.w    4(sp),d0    ; arg1
  7.         move.w    6(sp),d1    ; arg2
  8.         sub.w    d1,d0        ; arg1-arg2
  9.         rts
  10.     end
  11.